home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 1 (Walnut Creek)
/
Aminet - June 1993 [Walnut Creek].iso
/
aminet
/
dev
/
lang
/
pcq12b.lzh
/
Include
/
Devices
/
GamePort.i
< prev
next >
Wrap
Text File
|
1990-10-01
|
990b
|
54 lines
{
GamePort.i for PCQ Pascal
GamePort device command definitions
}
{$I "Include:Exec/IO.i"}
const
{***** GamePort commands *****}
GPD_READEVENT = CMD_NONSTD + 0;
GPD_ASKCTYPE = CMD_NONSTD + 1;
GPD_SETCTYPE = CMD_NONSTD + 2;
GPD_ASKTRIGGER = CMD_NONSTD + 3;
GPD_SETTRIGGER = CMD_NONSTD + 4;
{***** GamePort structures *****}
{ gpt_Keys }
GPTB_DOWNKEYS = 0;
GPTF_DOWNKEYS = 1;
GPTB_UPKEYS = 1;
GPTF_UPKEYS = 2;
type
GamePortTrigger = record
gpt_Keys : Short; { key transition triggers }
gpt_Timeout : Short; { time trigger (vertical blank units) }
gpt_XDelta : Short; { X distance trigger }
gpt_YDelta : Short; { Y distance trigger }
end;
const
{***** Controller Types *****}
GPCT_ALLOCATED = -1; { allocated by another user }
GPCT_NOCONTROLLER = 0;
GPCT_MOUSE = 1;
GPCT_RELJOYSTICK = 2;
GPCT_ABSJOYSTICK = 3;
{***** Errors *****}
GPDERR_SETCTYPE = 1; { this controller not valid at this time }